object frmNumSvr: TfrmNumSvr
  Left = 247
  Top = 301
  Width = 420
  Height = 187
  Caption = 'Delphi OLE Automation: NumSvr Controller'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  TextHeight = 16
  object Label1: TLabel
    Left = 184
    Top = 24
    Width = 217
    Height = 16
    AutoSize = False
    Caption = 'Modify the server'#39's property X .'
  end
  object Label2: TLabel
    Left = 184
    Top = 64
    Width = 209
    Height = 33
    AutoSize = False
    Caption = 'Pass an argument by reference to a server method:  Incr(n)'
  end
  object cmdExit: TButton
    Left = 16
    Top = 112
    Width = 105
    Height = 33
    Caption = 'E&xit'
    TabOrder = 1
    OnClick = cmdExitClick
  end
  object cmdBumpit: TButton
    Left = 16
    Top = 16
    Width = 105
    Height = 33
    Caption = 'Add 1 to X'
    TabOrder = 0
    OnClick = cmdBumpitClick
  end
  object txtXVal: TEdit
    Left = 129
    Top = 69
    Width = 40
    Height = 24
    AutoSize = False
    MaxLength = 4
    TabOrder = 2
    Text = '1'
  end
  object cmdIncr: TButton
    Left = 16
    Top = 64
    Width = 105
    Height = 33
    Caption = 'Increment me'
    TabOrder = 3
    OnClick = cmdIncrClick
  end
  object OleAutoClient1: TOleAutoClient
    Left = 140
    Top = 114
  end
end